home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programmer Power Tools
/
Programmer Power Tools.iso
/
bss
/
pup.arc
/
QUOTE.C
< prev
next >
Wrap
C/C++ Source or Header
|
1987-10-29
|
882b
|
34 lines
#include <puppy.h>
#include <pupmem.h>
/* Pull the next quote from the file, output to the screen. */
quote() {
int i,f;
char mark[5];
char c;
f= open("quotes.pup",0); /* open it, */
if (f == -1) return(0); /* doesnt exist, */
lseek(f,pup.quote_pos,0); /* seek to correct place, */
strcpy(mark,"abcd"); /* anything but CR LF CR LF */
mputs("\r\n");
while (1) {
if (! read(f,&c,1)) { /* read a character, */
lseek(f,0L,0); /* rewind if we hit EOF */
pup.quote_pos= 0L; /* (current position) */
if (! read(f,&c,1)) break; /* try again */
}
++pup.quote_pos; /* current actual position */
for (i= 0; i < 4; i++) /* ASCII shift register */
mark[i]= mark[i + 1]; /* slide 'em through */
mark[3]= c; /* add to the end */
if (strcmp(mark,"\r\n\r\n") == 0) break;
fmconout(c);
}
mputs("\r\n");
close(f);
}